Namespace DataTypes
    Public Class EventItem
        Private _EventId, _Title, _Description, _Url As String
        Private _EventSchedule As Generic.List(Of EventScheduleItem)
        Private _EventStartDate, _EventEndDate As Date

        Public Sub New(ByVal EventId As String, ByVal Title As String, ByVal Description As String, ByVal Url As String, ByVal StartDate As Date, ByVal EndDate As Date)
            _EventId = EventId
            _Title = Title
            _Description = Description
            _Url = Url
            _EventStartDate = StartDate
            _EventEndDate = EndDate
        End Sub

        Public Sub New(ByVal Title As String, ByVal Description As String, ByVal Url As String, ByVal StartDate As Date, ByVal EndDate As Date)
            _Title = Title
            _Description = Description
            _Url = Url
            _EventStartDate = StartDate
            _EventEndDate = EndDate
        End Sub

        Public Property EventId() As String
            Get
                Return _EventId
            End Get
            Set(ByVal value As String)
                _EventId = value
            End Set
        End Property

        Public Property Title() As String
            Get
                Return _Title
            End Get
            Set(ByVal value As String)
                _Title = value
            End Set
        End Property

        Public Property Description() As String
            Get
                Return _Description
            End Get
            Set(ByVal value As String)
                _Description = value
            End Set
        End Property

        Public Property Url() As String
            Get
                Return _Url
            End Get
            Set(ByVal value As String)
                _Url = value
            End Set
        End Property

        Public Property EventSchedule() As Generic.List(Of EventScheduleItem)
            Get
                Return _EventSchedule
            End Get
            Set(ByVal value As Generic.List(Of EventScheduleItem))
                _EventSchedule = value
            End Set
        End Property

        Public Property EventStartDate() As Date
            Get
                Return _EventStartDate
            End Get
            Set(ByVal value As Date)
                _EventStartDate = value
            End Set
        End Property

        Public Property EventEndDate() As Date
            Get
                Return _EventEndDate
            End Get
            Set(ByVal value As Date)
                _EventEndDate = value
            End Set
        End Property
    End Class
End Namespace